From: Kenichi Handa <handa@m17n.org>
Date: Tue, 30 Jul 2002 06:34:28 +0000 (+0000)
Subject: (safe-chars): Put `char-table-extra-slots' property with value 0.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~31312
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=6b6fff6bc610d33e99d9c7248569eb5b0ca5ed80;p=emacs.git

(safe-chars): Put `char-table-extra-slots' property with value 0.
---

diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 7efcb9c1fb7..38817cde69c 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -1099,6 +1099,8 @@ a value of `safe-charsets' in PLIST."
 
   coding-system)
 
+(put 'safe-chars 'char-table-extra-slots 0)
+
 (defun define-coding-system-alias (alias coding-system)
   "Define ALIAS as an alias for coding system CODING-SYSTEM."
   (put alias 'coding-system (coding-system-spec coding-system))